%!PS-Adobe-3.0
%%Title: Diplomacy Map (Sail Ho!)
%%Creator: dpmap, using a map created with DPeye by Mario Huys (woelpad@yahoo.com)
%%DocumentPaperSizes: Letter
%%LanguageLevel: 2
%%Orientation: Landscape
%%Pages: (atend)
%%DocumentNeededResources: font Helvetica-Bold Courier Courier-Bold Times-Roman
%%EndComments

%%BeginDefaults
%%PageResources: font Helvetica-Bold Courier Courier-Bold Times-Roman
%%EndDefaults

% INFO
%  378  568 AEO    Village of Aeolus
%  208  508 ALC    Alcmene's Village
%  498  438 AMA    Amazon Village
%  398  428 APH    Aphrodite's Beach
%  513  308 ARE    Palace of Ares
%  453  218 ARG    Argo's Pasture
%  378  190 AUT    Autolycus' Hideout
%  318  190 CAL    Callisto's Stronghold
%  508  231 CEC    Cecrops' Channel
%  488  533 CEN    Centaur Forest
%  168  218 CHA    Charon's Crossing
%  448  568 CHI    Chiron's Cave
%  373  358 CUP    Cupid's Cloud
%  248  608 DEI    Deianeira's Grave
%  558  368 EAS    Eastern Ocean
%  488  478 ECH    Echo's Glade
%  133  213 ELY    Elysian Fields
%  178  578 FIE    Field of the Golden Fleece
%  223  288 FIR    Sea of Fire
%  238  190 FUR    Realm of the 3 Furies
%  358  233 GAB    Gabrielle's Village
%  388  513 GLI    Glittering Gulf
%  278  448 GOC    Gulf of Chains
%  318  233 HAD    Depths of Hades
%  258  528 HER    Hercules' Respite
%  228  363 HES    Shrine to Hestia
%  231  365 HES/NC Shrine to Hestia (north coast)
%  223  338 HES/SC Shrine to Hestia (south coast)
%  478  283 HIN    Forest of the Golden Hind
%  548  448 HIP    Hippolyta's Girdle
%  148  508 JAS    Jason's Kingdom
%  428  190 JOX    Joxter's Retreat
%  148  328 LBS    Lesbian Sea
%  195  355 LES    Isle of Lesbos
%  358  308 LOV    Lover's Lane
%  343  518 MID    Realm of King Midas
%  568  508 MIN    Minotaur's Labyrinth
%  198  448 MOR    Morpheus' Palace
%  438  513 NAR    Narcissus' Reflection
%  468  318 NES    Nestor's Kingdom
%  318  568 OLY    Mount Olympus
%  148  258 PEA    Ocean of Peace
%  268  238 PER    Persephone's Garden
%  388  278 POS    Poseidon's Curse
%  328  438 PRO    Prometheus' Cliff
%  388  388 PSY    Village of Psyche
%  428  388 PSY/EC Village of Psyche (east coast)
%  358  388 PSY/WC Village of Psyche (west coast)
%  303  478 SAL    Salmonius' Scheme
%  458  378 SCH    Scholars Channel
%  518  338 SER    Serina's Village
%  528  598 SIS    Sisyphus' Hill
%  278  388 SOA    Sea of Arrows
%  228  418 SOD    Sea of Dreams
%  318  273 SOT    Sea of Tears
%  538  193 SOU    South Sea
%  398  468 SOW    Sea of Waves
%  518  268 STR    Strife's Cave
%  438  613 TAN    Tantalus' Pool
%  218  238 TAR    Tartarus
%  263  348 VES    Convent of the Vestal Virgins
%  148  398 WES    Western Ocean
%  408  228 XEN    Xena's Rest
%  328  613 ZEU    Temple of Zeus
% MAP

%%BeginSetup
/bd { bind def } bind def
/xd { exch def } bd
/ld { load def } bd
/ifloor { .001 add floor cvi } bd
/iceiling { .001 sub ceiling cvi } bd
/min { 2 copy gt { exch } if pop } bd
/max { 2 copy lt { exch } if pop } bd
/secure_atan { 2 copy 0 eq exch 0 eq and { pop pop 0 } { atan } ifelse } bd
/center { 3 2 roll add 2 div 3 1 roll add 2 div exch } bd
/a /arc ld
/c /curveto ld
/d /setdash ld
/f /fill ld
/h /show ld
/k /stroke ld
/l /lineto ld
/m /moveto ld
/n /newpath ld
/o /rotate ld
/p /closepath ld
/r /grestore ld
/s /gsave ld
/t /translate ld
/w /setlinewidth ld
/x /scale ld
/y /scalefont ld
/z /setfont ld
/Powers 20 dict def
%%IncludeResource: font Helvetica-Bold
/MapUnitLetterFont /Helvetica-Bold findfont 14 y def
%%IncludeResource: font Helvetica-Bold
/MapNameFont /Helvetica-Bold findfont 14 y def
%%IncludeResource: font Courier
/TextFixedFont /Courier findfont def
%%IncludeResource: font Courier-Bold
/TextHeadingFont /Courier-Bold findfont def
%%IncludeResource: font Times-Roman
/TextTitleFont /Times-Roman findfont def
/PageSetup {
	612 0 t
	90 o
	/FinishReport { } def /InTextMode true def
	Black
	MovePhase
} bd
/ShowPage {
	DrawAliases
	InTextMode { FinishReport } { r } ifelse
	FrameMap
	showpage
} bd
/VisitColors {
	3 dict begin
	/c xd /r xd /g xd
	/BorderBlack .1 g
	/MountainGrey .5 g
	/IceGrey .9 g
	/ArrowBlack 0 g
	/ArrowWhite .9 g
	/White .9 g
	/Black 0 g
	/LandBrown .8 .7 .4 r
	/SeaBlue .1 .4 .6 r
	/ArrowRed 1 0 0 r
	/ArrowBlue .529 .808 .922 r
	/DarkGreen 0 .4 0 r
	/Blue 0 0 1 r
	/Red 1 0 0 r
	/Green 0 .7 0 r
	/Brown .6 .45 .2 r
	end
} def
/VisitPowers {
	1 dict begin
	/p xd
	/EAST (E) /Black /White p
	/NORTH (N) /Blue /White p
	/SOUTH (S) /Red /White p
	/WEST (W) /Green /White p
	/UNOWNED (?) /Brown /White p
	end
} def
/Controls {
	/ChangeController true def
} bd
/DrawFleet {
	SwitchToMapMode
	Power begin
	s t
	.7 .7 x
	0 8 t
	s
	.5 .5 x -35 -16 t
	12 3 m 12 9 l 9 12 l 6 13 l 6 17 l % bow
	9 17 l 9 23 l 2 22 l 7 16 l 6 16 l
	1 22 l % bowsprit
	6 27 l 12 37 l 15 45 l % front sail
	19 44 l 19 48 l 16 48 l 15 49 l 19 49 l
	19 55 l 20 55 l 20 49 l 24 49 l 23 48 l
	20 48 l 20 44 l % front mast
	24 43 l 24 34 l 27 29 l 33 29 l 33 32 l
	25 32 l 28 39 l 31 51 l % mid sail left
	35 50 l 35 54 l 30 54 l 29 55 l 35 55 l
	35 63 l 36 63 l 36 56 l 36 55 l 42 55 l
	41 54 l 36 54 l 36 50 l % mid mast
	41 49 l 41 32 l 36 32 l 36 29 l 39 29 l
	41 43 l % mid sail right
	45 43 l 45 47 l 41 47 l 41 48 l 45 48 l
	45 55 l 46 55 l 46 48 l 51 48 l 50 47 l
	46 47 l 46 43 l % rear mast
	48 43 l 49 28 l 51 28 l 51 31 l 54 33 l
	54 23 l 57 26 l 57 22 l 56 21 l % rear sail and flag
	56 15 l 59 12 l 59 7 l 57 4 l 55 3 l p % bow
	s Controlled { s 12 w Outer k r } if 4 w Contrast k r Paint f
	r
	Offset aload pop m
	MapUnitLetterFont z
	Contrast Letter h
	r
	end
} bd
/DrawArmy {
	SwitchToMapMode
	Power begin
	s t
	.7 .7 x
	0 8 t
	n 0 0 9 0 360 a p % wheel
	Controlled { s 6 w Outer k r } if 2 w Contrast k
	-20 7 m 10 7 l 10 3 l 14 3 l
	14 1 l -16 1 l -16 3 l -20 3 l p % barrel
	4 2 m 24 -8 l 26 -8 l 18 -8 l -2 2 l % carriage
	s Controlled { s 6 w Outer k r } if 2 w Contrast k r Paint f
	n 0 0 9 0 360 a p % wheel
	Paint f
	Offset aload pop m
	MapUnitLetterFont z
	Contrast Letter h
	r
	end
} bd
/DrawAlias {
	SwitchToMapMode
	s
	3 1 roll t
	.7 .7 x
	0 -14 t
	MapNameFont z
	dup stringwidth pop -2 div 0 neg m h
	r
} bd
/DrawName {
	pop pop pop
} bd
/VisitTerritories {
	5 dict begin
	/b xd
	/g xd
	/w xd
	/l xd
	/c xd
	(MOR) 198 448 c
	(ALC) 208 508 c
	(HER) 258 528 c
	(AEO) 378 568 c
	(CHI) 448 568 c
	(CEN) 488 533 c
	(ECH) 488 478 c
	(AMA) 498 438 c
	(SAL) 303 478 c
	(MID) 343 518 c
	(PRO) 328 438 c
	(LES) 195 355 c
	(VES) 263 348 c
	(CHA) 168 218 c
	(TAR) 218 238 c
	(PER) 268 238 c
	(HAD) 318 233 c
	(GAB) 358 233 c
	(XEN) 408 228 c
	(ARG) 453 218 c
	(STR) 518 268 c
	(SER) 518 338 c
	(HIN) 478 283 c
	(NES) 468 318 c
	(MIN) 568 508 c
	(CUP) 373 358 c
	(APH) 398 428 c
	(JAS) 148 508 c
	(ELY) 133 213 c
	(JOX) 428 190 c
	(HIP) 548 448 c
	(OLY) 318 568 l
	(ARE) 513 308 l
	(SIS) 528 598 l
	(ZEU) 328 613 l
	(TAN) 438 613 l
	(FIE) 178 578 l
	(FUR) 238 190 l
	(CAL) 318 190 l
	(AUT) 378 190 l
	(DEI) 248 608 l
	(SOD) 228 418 w
	(GOC) 278 448 w
	(WES) 148 398 w
	(SOA) 278 388 w
	(GLI) 388 513 w
	(NAR) 438 513 w
	(SOW) 398 468 w
	(FIR) 223 288 w
	(LBS) 148 328 w
	(PEA) 148 258 w
	(SOT) 318 273 w
	(POS) 388 278 w
	(CEC) 508 231 w
	(SOU) 538 193 w
	(EAS) 558 368 w
	(SCH) 458 378 w
	(LOV) 358 308 w
	(HES) 228 363 g
	(PSY) 388 388 g
	(PSY/WC) 358 388 b
	(PSY/EC) 428 388 b
	(HES/NC) 231 365 b
	(HES/SC) 223 338 b
	end
} def
/VisitSupplies {
	1 dict begin
	/s xd
	/MOR 198 428 s
	/HER 258 508 s
	/AEO 378 548 s
	/CEN 488 513 s
	/AMA 498 418 s
	/PRO 328 423 s
	/LES 180 348 s
	/VES 263 328 s
	/TAR 218 218 s
	/HAD 318 213 s
	/XEN 408 208 s
	/STR 518 253 s
	/ARE 513 293 s
	/NES 468 303 s
	/CUP 353 358 s
	/APH 398 413 s
	end
} def
/supply {
	SwitchToMapMode
	Power begin
	s
	t
	.7 .7 x
	Controlled {
		Outer
		n 0 0 8 0 360 a f
		Contrast
		n 0 0 6 0 360 a f
	} if
	Paint
	n 0 0 4 0 360 a f
	r
	end
} bd
/SetArrowStateOk {
	[] 0 d
} bd
/OkOrder {
	/SetArrowState /SetArrowStateOk ld
} bd
/SetArrowStateFailed {
	[4 6] 2 d
} bd
/FailedOrder {
	/SetArrowState /SetArrowStateFailed ld
} bd
/MovePhase {
	/ArrowColor /ArrowBlack ld
	/ArrowBase 20 def
	/TraceArrowHead /TraceSingleArrowHead ld
	InTextMode not { ArrowColor } if
} bd
/RetreatPhase {
	/ArrowColor /ArrowRed ld
	/ArrowBase 39.8 def
	/TraceArrowHead /TraceDoubleArrowHead ld
	InTextMode not { ArrowColor } if
} bd
/ProposePhase {
	/ArrowColor /ArrowWhite ld
	/ArrowBase 39.8 def
	/TraceArrowHead /TraceDoubleArrowHead ld
	InTextMode not { ArrowColor } if
} bd
/TraceSingleArrowHead {
	% draw the arrow head ...
	n
	dup -5 m
	dup 20 add 0 l
	dup 5 l
	p
} bd
/TraceDoubleArrowHead {
	% draw the double arrow head ...
	n
	dup -5 m
	dup 19.8 add
	dup -1 l
	dup -5 l
	dup 20 add 0 l
	dup 5 l
	1 l
	dup 5 l
	p
} bd
/PaintArrowMove {
	s
	3 index 3 index t
	3 2 roll sub 3 1 roll exch sub exch
	2 copy dup mul exch dup mul add sqrt 3 1 roll exch secure_atan
	.7 .7 x
	0 8 t
	o
	.7 div ArrowBase sub
	% if base of arrow is long enough, shorten it enough
	% to e.g. move arrow start beyond support circle
	dup 14 gt {
		14 14 0 t sub
	} {
		0 t 0
	} ifelse
	% if base is still too long, shorten it some more
	% to make arrow head touch support circle
	dup 14 gt {
		14 sub
	} {
		pop 0
	} ifelse
	1 w
	TraceArrowHead
	k
	% now the shaft ...
	2 w
	0 0 m
	0 l
	k
	r
} bd
/PaintArrowCircle {
	s
	5 1 roll
	3 index 3 index t
	3 2 roll sub 3 1 roll exch sub exch
	2 copy dup mul exch dup mul add sqrt 3 1 roll exch secure_atan
	.7 .7 x
	0 8 t
	o
	.7 div
	1 index sub
	% if base of arrow is long enough, shorten it enough
	% to e.g. move arrow start beyond support circle
	dup 14 gt {
		14 14 0 t sub
	} {
		0 t 0
	} ifelse
	% draw the circle ...
	1 w
	n
	2 copy add 0 4 3 roll 0 360 a
	p k
	% now the shaft ...
	2 w
	0 0 m
	0 l
	k
	r
} bd
/PaintArrowArrive {
	s
	t
	.7 .7 x
	0 8 t
	180 rotate 54 ArrowBase add neg 0 t
	40
	1 w
	TraceArrowHead
	k
	% now the shaft ...
	2 w
	0 0 m
	0 l
	k
	-5 0 m -10 0 l
	-15 0 m -20 0 l
	k
	r
} bd
/PaintArrowDepart {
	s
	t
	.7 .7 x
	0 8 t
	-54 0 t
	40
	2 w
	0 0 m
	0 l
	-6 0 m -10 0 l
	-16 0 m -20 0 l
	k
	r
} bd
/ArrowMove {
	SwitchToMapMode
	SetArrowState
	s
	PaintArrowMove
	r
} bd
/ArrowHold {
	SwitchToMapMode
	SetArrowState
	s
	24 PaintArrowCircle
	r
} bd
/ArrowSupport {
	SwitchToMapMode
	SetArrowState
	s
	center
	8 PaintArrowCircle
	r
} bd
/ArrowConvoy {
	SwitchToMapMode
	SetArrowState
	s
	center
	12 PaintArrowCircle
	r
} bd
/ArrowArrive {
	SwitchToMapMode
	SetArrowState
	s
	PaintArrowArrive
	r
} bd
/ArrowDepart {
	SwitchToMapMode
	SetArrowState
	s
	PaintArrowDepart
	r
} bd
/ArrowRetreat {
	RetreatPhase
	ArrowMove
	MovePhase
} bd
/ArrowPropose {
	ProposePhase
	ArrowMove
	MovePhase
} bd
/ArrowRetreatArrive {
	RetreatPhase
	ArrowArrive
	MovePhase
} bd
/ArrowRetreatDepart {
	RetreatPhase
	ArrowDepart
	MovePhase
} bd
/BuildUnit {
	SwitchToMapMode
	s
	t
	ArrowWhite
	.7 .7 x
	0 8 t
	6 w [ 3.14 6.28 ] 1.57 d
	n
	0 0 24 0 360 a
	p k
	r
} bd
/SlashUnit {
	s
	3 1 roll t
	.7 .7 x
	0 8 t
	n
	-21 -16 m
	11 16 l
	21 16 l
	-11 -16 l
	p
	exec
	r
} bd
/DestroyUnit {
	SwitchToMapMode
	{ ArrowRed f } SlashUnit
} bd
/DisbandUnit {
	SwitchToMapMode
	{ s ArrowWhite f r 1 w ArrowRed k } SlashUnit
} bd
/RemoveUnit {
	SwitchToMapMode
	{ ArrowWhite f } SlashUnit
} bd
/FindUnit {
	SwitchToMapMode
	s
	t
	ArrowBlue
	.7 .7 x
	0 8 t
	6 w [ 3.14 6.28 ] 1.57 d
	n
	0 0 24 0 360 a
	p k
	r
} bd
/LoseUnit {
	SwitchToMapMode
	s
	t
	ArrowBlue
	.7 .7 x
	0 8 t
	4 w
	-12 4 m
	-8 7 -4 7 0 4 c
	4 1 8 1 12 4 c
	-12 -4 m
	-8 -1 -4 -1 0 -4 c
	4 -7 8 -7 12 -4 c
	k
	r
} bd
/QueryUnit {
	SwitchToMapMode
	s
	t
	ArrowWhite
	.7 .7 x
	0 8 t
	4 w
	-12 4 m
	-8 7 -4 7 0 4 c
	4 1 8 1 12 4 c
	-12 -4 m
	-8 -1 -4 -1 0 -4 c
	4 -7 8 -7 12 -4 c
	k
	r
} bd
/SplitString {
	7 dict begin
	/nrChars xd
	/indentString xd
	/objectString xd
	/objectLast objectString length 1 sub def
	% Short string?
	objectLast nrChars lt {
		false objectString
	} {
		% Look for a suitable place to split.
		% First tracking backwards, if that doesn't work, look forward.
		/splitIndex -1 def
		nrChars -1 0 {
			objectString 1 index get 32 eq {
				/splitIndex xd exit
			} if pop
		} for splitIndex -1 eq {
			nrChars 1 add 1 objectLast {
				objectString 1 index get 32 eq {
					/splitIndex xd exit
				} if pop
			} for
		} if
		splitIndex -1 eq splitIndex objectLast eq or {
			false objectString
		} {
			% The first part.
			objectString 0 splitIndex getinterval
			% The second part.
			objectString splitIndex 1 add objectLast splitIndex sub getinterval
			% Add indentation if needed.
			indentString length 0 gt {
				dup length indentString length add string
				dup 0 indentString putinterval
				dup indentString length 4 3 roll putinterval
			} if
			% Add white space of the first part.
			/nonSpaceIndex objectLast 1 add def
			0 1 objectLast {
				objectString 1 index get 32 ne {
					/nonSpaceIndex xd exit
				} if pop
			} for
			nonSpaceIndex 0 gt nonSpaceIndex splitIndex lt and {
				dup length nonSpaceIndex add string
				dup 0 objectString 0 nonSpaceIndex getinterval putinterval
				dup nonSpaceIndex 4 3 roll putinterval
			} if
			exch true exch
		} ifelse
	} ifelse
	end
} bd
/DrawLayoutBorders {
	s
	TextFixedFont 12 y z
	r
} bd
/Owner <<
	/Steps [
		{ /Count 0 def /Y 123.36 def false true } bind
		{
			Count 7 ge { false true } {
				65 SplitString
				/Count Count 1 add def /Y Y 12 sub def
				21.6 Y m h
				true false
			} ifelse
		} bind
		{
			65 SplitString [ exch {
				21.6 27.36 m h
			} /exec load ] cvx /Finish xd
			true true
		} bind
		{
			/Count 1 def /Finish {
				21.6 27.36 m (... \() h
				Count dup 1 add log iceiling string cvs h
				( more\)) h
			} bd false true
		} bind
		{ /Count Count 1 add def 65 SplitString pop true false } bind
	]
	/Start {
		TextFixedFont 12 y z
		/StepIndex 0 def
		/Step Steps 0 get def
		/Finish { } def
	} bind
	/Write {
		(  ) {
			Step {
				/StepIndex StepIndex 1 add def
				/Step Steps StepIndex get def
			} if { not { exit } if () } if
		} loop
	} bind
>> def
/OwnerReport {
	SwitchToTextMode
	Owner begin Start end
	/FinishReport /FinishOwnerReport load def
} bd
/WriteOwner {
	Owner begin Write end
} bd
/FinishOwnerReport {
	Owner begin Finish end
} bd
/Adjustment <<
	/Steps [
		{ /Count 0 def /Y 123.36 def false true } bind
		{
			Count 7 ge { false true } {
				37 SplitString
				/Count Count 1 add def /Y Y 12 sub def
				504 Y m h
				true false
			} ifelse
		} bind
		{
			37 SplitString [ exch {
				504 27.36 m h
			} /exec load ] cvx /Finish xd
			true true
		} bind
		{
			/Count 1 def /Finish {
				504 27.36 m (... \() h
				Count dup 1 add log iceiling string cvs h
				( more\)) h
			} bd false true
		} bind
		{ /Count Count 1 add def 37 SplitString pop true false } bind
	]
	/Start {
		TextHeadingFont 12 y z
		504 123.36 moveto
		(Adjustments) h
		TextFixedFont 12 y z
		/StepIndex 0 def
		/Step Steps 0 get def
		/Finish { } def
	} bind
	/Write {
		(  ) {
			Step {
				/StepIndex StepIndex 1 add def
				/Step Steps StepIndex get def
			} if { not { exit } if () } if
		} loop
	} bind
>> def
/AdjustReport {
	SwitchToTextMode
	Adjustment begin Start end
	/FinishReport /FinishAdjustReport load def
} bd
/WriteAdjust {
	Adjustment begin Write end
} bd
/FinishAdjustReport {
	Adjustment begin Finish end
} bd
/Retreat <<
	/Steps [
		{ /Count 0 def /Y 231.36 def false true } bind
		{
			Count 7 ge { false true } {
				37 SplitString
				/Count Count 1 add def /Y Y 12 sub def
				504 Y m h
				true false
			} ifelse
		} bind
		{
			37 SplitString [ exch {
				504 135.36 m h
			} /exec load ] cvx /Finish xd
			true true
		} bind
		{
			/Count 1 def /Finish {
				504 135.36 m (... \() h
				Count dup 1 add log iceiling string cvs h
				( more\)) h
			} bd false true
		} bind
		{ /Count Count 1 add def 37 SplitString pop true false } bind
	]
	/Start {
		TextHeadingFont 12 y z
		504 231.36 moveto
		(Retreats) h
		TextFixedFont 12 y z
		/StepIndex 0 def
		/Step Steps 0 get def
		/Finish { } def
	} bind
	/Write {
		(  ) {
			Step {
				/StepIndex StepIndex 1 add def
				/Step Steps StepIndex get def
			} if { not { exit } if () } if
		} loop
	} bind
>> def
/RetreatReport {
	SwitchToTextMode
	Retreat begin Start end
	/FinishReport /FinishRetreatReport load def
} bd
/WriteRetreat {
	Retreat begin Write end
} bd
/FinishRetreatReport {
	Retreat begin Finish end
} bd
/Order <<
	/Steps [
		{ /Count 0 def /Y 519.36 def false true } bind
		{
			Count 22 ge { false true } {
				37 SplitString
				/Count Count 1 add def /Y Y 12 sub def
				504 Y m h
				true false
			} ifelse
		} bind
		{
			37 SplitString [ exch {
				504 243.36 m h
			} /exec load ] cvx /Finish xd
			true true
		} bind
		{
			/Count 1 def /Finish {
				504 243.36 m (... \() h
				Count dup 1 add log iceiling string cvs h
				( more\)) h
			} bd false true
		} bind
		{ /Count Count 1 add def 37 SplitString pop true false } bind
	]
	/Start {
		TextFixedFont 12 y z
		/StepIndex 0 def
		/Step Steps 0 get def
		/Finish { } def
	} bind
	/Write {
		(  ) {
			Step {
				/StepIndex StepIndex 1 add def
				/Step Steps StepIndex get def
			} if { not { exit } if () } if
		} loop
	} bind
>> def
/OrderReport {
	SwitchToTextMode
	Order begin Start end
	/FinishReport /FinishOrderReport load def
} bd
/WriteOrder {
	Order begin Write end
} bd
/FinishOrderReport {
	Order begin Finish end
} bd
/DrawTitle {
	SwitchToTextMode
	TextTitleFont 36 y z
	(Diplomacy)
	504 562.08 m h
	TextTitleFont 24 y z
	dup stringwidth pop dup 266.4 gt {
		504 528 m
		266.4 exch div dup 1 x exch
		0 6.72 rmoveto h
		1 exch div 1 x
	} {
		pop 504 534.72 m h
	} ifelse
} bd
/SwitchToTextMode {
	InTextMode {
		FinishReport /FinishReport { } def
	} {
		r /InTextMode true def
	} ifelse
} bd
/SwitchToMapMode {
	InTextMode {
		FinishReport /FinishReport { } def
		/InTextMode false def
		s
		27.6 138 456 444 rectclip .9649 .9649 x -93.87 -33.27 t
		ArrowColor
		OkOrder
	} if
} bd
/FrameMap {
	s
	2 w LandBrown
	24.6 135.95 m 486.6 135.95 l 486.6 584.05 l 24.6 584.05 l
	p
	s 8 w Black k r
	clipsave clip k cliprestore
	r
} bd
/PaintMap {
	SwitchToMapMode
	s
	SeaBlue 119.36 174.16 478.8 464.4 rectfill
	IncludeIsland
	IncludeInternalBorders
	r
} bd
/DrawMap {
	PageSetup
	PaintMap
	DrawSupplies
} bd
/DrawSupplies {
	SwitchToMapMode
	UNOWNEDCENTER
	{ supply pop } bind
	VisitSupplies
} bd
/DrawAliases {
	NameTerritories
} bd
/NameTerritories {
	SwitchToMapMode
	s
	{ DarkGreen 3 2 roll DrawAlias } bind
	{ DarkGreen 3 2 roll DrawAlias } bind
	{ White 3 2 roll DrawAlias } bind
	{ DarkGreen 3 2 roll DrawAlias } bind
	{ pop pop pop } bind
	VisitTerritories
	r
} bd
/IncludeIsland {
	s
	/fk {
		p
		s LandBrown f r
		k
	} bd
	1 w BorderBlack
	OutlineChartBrown
	r
} bd
/IncludeInternalBorders {
	s
	/fk { k } bd
	1 w [ 6 2 ] 3 d BorderBlack
	OutlineChartBlack
	r
} bd
/OutlineChartBrown {
	445.36 307.84 m
	448.72 301.2 l
	453.2 298.8 l
	456.8 294 l
	455.6 288.32 l
	460.8 277.36 l
	473.6 267.6 l
	476.88 265.52 l
	480.8 264.32 l
	482.56 261.36 l
	490.8 255.12 l
	510.56 246.72 l
	521.28 244.8 l
	540 255.12 l
	543.2 259.2 l
	547.36 270.96 l
	544.4 274.24 l
	544.96 280.56 l
	549.76 283.52 l
	553.12 288 l
	559.68 288.96 l
	561.6 292.96 l
	559.2 309.12 l
	545.36 335.52 l
	535.76 341.52 l
	520.8 349.92 l
	489.6 352.32 l
	461.36 334.96 l
	459.2 329.12 l
	454.4 325.2 l
	445.2 307.92 l
	445.36 307.84 l
	fk
	120 173.92 m
	120 218.72 l
	126.56 229.36 l
	142.16 234.16 l
	158.4 226.96 l
	172.96 228 l
	192 234.16 l
	212.4 246.16 l
	235.2 248.56 l
	266.96 244.96 l
	271.36 244.8 l
	277.68 242.16 l
	296.4 240.72 l
	307.68 237.36 l
	323.92 242.72 l
	338.88 240 l
	362.96 241.92 l
	379.76 251.52 l
	387.76 251.12 l
	403.12 253.2 l
	424.8 250.32 l
	433.12 241.2 l
	448.08 236.72 l
	460.08 228.96 l
	472.08 225.92 l
	489.6 211.36 l
	476.4 189.76 l
	476.96 174.16 l
	120 173.92 l
	fk
	170.4 342.72 m
	175.76 338.56 l
	183.52 337.2 l
	193.2 332.56 l
	214.16 343.92 l
	224 341.12 l
	234.56 342.16 l
	240.56 333.12 l
	246 315.12 l
	252.56 312.16 l
	262.72 310.8 l
	271.2 314.56 l
	280.16 322.96 l
	284.96 333.76 l
	280.96 345.04 l
	279.6 354.72 l
	269.36 359.52 l
	261.6 364.96 l
	250.96 368.16 l
	244.8 372.72 l
	227.6 374.72 l
	217.12 372.32 l
	199.76 372.16 l
	187.76 370.32 l
	181.76 370.96 l
	172.8 363.12 l
	169.76 356.56 l
	170.96 342.16 l
	170.4 342.72 l
	fk
	347.36 349.36 m
	364.16 341.52 l
	382.72 342 l
	385.76 346.96 l
	393.2 355.2 l
	398.32 356.72 l
	403.2 361.36 l
	415.76 371.52 l
	416 388.56 l
	430.16 407.52 l
	421.76 433.92 l
	411.52 439.52 l
	400.08 440.16 l
	390.48 440.16 l
	382.8 436.96 l
	376.16 421.36 l
	364.8 406.32 l
	363.52 395.44 l
	350.96 375.76 l
	342.48 366 l
	341.28 353.44 l
	347.28 348.96 l
	347.36 349.36 l
	fk
	597.2 637.12 m
	120 637.52 l
	119.92 432 l
	178.8 433.36 l
	190.4 422.16 l
	197.92 420 l
	202.8 421.92 l
	210.48 432.96 l
	216 446.56 l
	217.76 449.52 l
	227.36 472.96 l
	234.56 483.12 l
	238.8 483.12 l
	241.76 492.16 l
	250.8 485.52 l
	256.8 486.16 l
	266.4 478.32 l
	278.4 477.76 l
	286.8 457.36 l
	298.8 442.32 l
	302.96 435.76 l
	310.16 408.16 l
	324 409.36 l
	324.56 412.96 l
	337.76 414.72 l
	346.16 437.52 l
	351.6 444.16 l
	346.16 481.92 l
	366.56 510.72 l
	364.16 517.92 l
	371.36 528.16 l
	379.76 536.56 l
	391.76 540.72 l
	401.36 546.72 l
	404.4 546.72 l
	421.2 549.12 l
	425.36 547.92 l
	428.96 547.92 l
	444.56 540.72 l
	456 531.76 l
	469.2 507.12 l
	464.96 486.16 l
	464.96 453.12 l
	476.4 424.32 l
	483.6 420.72 l
	492 397.36 l
	492.56 393.12 l
	496.16 393.12 l
	499.76 388.96 l
	511.76 391.36 l
	525.6 402.72 l
	535.76 415.92 l
	543.6 426.16 l
	559.2 429.76 l
	567.6 429.76 l
	572.96 426.16 l
	582 425.52 l
	597.6 418.32 l
	597.2 637.12 l
	fk
} bd
/OutlineChartBlack {
	145.76 232.32 m
	146.4 219.12 l
	144.56 212.56 l
	144 207.76 l
	146.96 203.52 l
	149.36 199.92 l
	171.6 196.96 l
	178.8 197.52 l
	193.2 201.12 l
	200.4 210.72 l
	196.8 216.72 l
	194.4 235.36 l
	fk
	192 201.76 m
	194.96 196.96 l
	202.8 196.96 l
	212.96 196.32 l
	216.56 199.36 l
	230.96 198.16 l
	237.6 202.32 l
	240 206.56 l
	250.8 208.96 l
	244.8 221.52 l
	242.4 225.76 l
	244.16 234.72 l
	243.76 247.2 l
	fk
	198 174.72 m
	202.8 182.56 l
	209.92 190.24 l
	214.8 198.16 l
	fk
	251.36 208.96 m
	255.6 205.36 l
	265.2 199.92 l
	270 199.36 l
	274.16 194.56 l
	283.12 190.8 l
	286.16 184.96 l
	291.6 183.12 l
	296.4 174.72 l
	fk
	270.48 199.2 m
	277.2 200.56 l
	282 201.76 l
	286.8 201.76 l
	294.56 199.36 l
	301.76 199.92 l
	291.6 210.72 l
	290.4 214.96 l
	290.4 228.72 l
	297.2 240.96 l
	fk
	301.68 199.52 m
	306 199.36 l
	324 199.92 l
	328.16 196.96 l
	345.6 196.96 l
	351.6 186.16 l
	349.2 174.72 l
	fk
	338.88 239.76 m
	337.76 232.32 l
	340.8 218.56 l
	340.8 213.76 l
	344.96 205.92 l
	344.96 197.52 l
	fk
	350.96 187.36 m
	356.96 190.96 l
	360.56 199.92 l
	370.16 204.16 l
	377.36 211.36 l
	380.4 220.96 l
	386.96 236.56 l
	385.2 243.12 l
	387.76 251.12 l
	fk
	378.56 213.76 m
	383.36 208.96 l
	388.16 207.76 l
	391.2 202.96 l
	403.36 195.92 l
	397.76 187.92 l
	398.4 183.12 l
	400.8 181.36 l
	395.2 174.32 l
	fk
	403.12 196.24 m
	412.16 201.12 l
	417.52 207.04 l
	424.16 210.16 l
	434.96 213.76 l
	437.36 219.76 l
	451.2 234.72 l
	fk
	417.52 207.36 m
	454.16 192.72 l
	459.6 193.36 l
	477.6 189.76 l
	fk
	492 351.76 m
	498 333.76 l
	503.36 325.92 l
	fk
	503.36 325.92 m
	503.36 321.76 l
	487.76 312.16 l
	484.16 306.72 l
	466.8 291.76 l
	456.8 286.24 l
	fk
	482.96 305.52 m
	490.8 299.52 l
	490.8 294.72 l
	500.96 287.52 l
	502.16 283.92 l
	497.36 271.92 l
	491.36 262.96 l
	484.8 259.36 l
	fk
	501.2 286.8 m
	508.8 283.36 l
	516.56 282.16 l
	527.36 283.92 l
	531.6 292.96 l
	537.6 301.36 l
	546 306.72 l
	559.2 307.92 l
	fk
	502.8 325.36 m
	506.4 325.36 l
	511.2 320.56 l
	518.4 321.12 l
	524.4 321.12 l
	529.76 319.36 l
	536.4 316.96 l
	545.36 310.32 l
	546 306.72 l
	fk
	350.56 375.36 m
	371.36 370.96 l
	393.6 373.36 l
	413.36 370.32 l
	413.36 370.96 l
	fk
	364.16 404.56 m
	372.56 408.16 l
	382.8 404.56 l
	394.16 403.36 l
	399.6 405.76 l
	407.36 403.36 l
	418.8 400.96 l
	422.4 402.16 l
	425.92 402 l
	fk
	213.2 372 m
	205.76 339.76 l
	fk
	241.2 330.16 m
	242.4 335.52 l
	246.56 339.12 l
	248.4 345.76 l
	252 352.32 l
	256.8 358.32 l
	266.4 361.36 l
	fk
	464.96 463.92 m
	491.36 462.16 l
	499.76 460.32 l
	507.6 460.32 l
	518.4 454.32 l
	522 442.32 l
	522.56 438.72 l
	526.8 437.52 l
	530.4 432.16 l
	533.36 432.16 l
	542.32 423.36 l
	fk
	570.48 427.52 m
	571.2 433.92 l
	566.4 445.36 l
	570.56 452.56 l
	578.4 459.12 l
	582.56 468.72 l
	577.76 478.96 l
	559.76 478.96 l
	546 468.16 l
	538.16 469.92 l
	531.6 477.12 l
	522 477.12 l
	517.76 472.96 l
	514.16 468.72 l
	518.4 454.32 l
	fk
	169.76 493.36 m
	192 490.96 l
	195.6 482.56 l
	205.2 476.56 l
	208.8 466.32 l
	222 459.12 l
	fk
	241.68 491.76 m
	241.76 495.12 l
	232.16 510.16 l
	225.6 531.12 l
	219.6 543.76 l
	181.2 543.12 l
	fk
	223.2 638.56 m
	222.56 622.32 l
	235.76 601.36 l
	230.4 591.12 l
	225.6 579.76 l
	222 567.76 l
	220.8 560.56 l
	220.16 541.92 l
	fk
	346.16 481.92 m
	337.2 475.36 l
	332.4 468.72 l
	318 462.72 l
	305.36 454.96 l
	297.76 443.44 l
	fk
	277.2 477.12 m
	282 496.32 l
	288.56 514.32 l
	301.2 526.32 l
	312.56 525.12 l
	315.6 515.52 l
	316.16 503.52 l
	319.2 491.52 l
	325.76 485.52 l
	337.76 476.56 l
	fk
	293.36 639.12 m
	290.96 626.56 l
	288.56 604.96 l
	276 589.92 l
	257.36 584.56 l
	254.4 590.56 l
	248.4 591.12 l
	232.16 594.72 l
	fk
	391.2 639.12 m
	388.8 631.92 l
	388.8 624.72 l
	393.6 613.36 l
	395.28 600.96 l
	388.8 599.52 l
	382.8 595.36 l
	373.76 590.56 l
	358.8 586.96 l
	342 586.32 l
	325.76 586.32 l
	314.96 589.36 l
	309.6 591.12 l
	288.56 604.96 l
	fk
	348.16 586.8 m
	343.76 570.16 l
	342.56 561.12 l
	343.2 550.32 l
	344.96 546.72 l
	349.76 545.52 l
	355.76 544.96 l
	358.16 539.52 l
	370.16 525.76 l
	fk
	312.16 525.36 m
	317.36 535.36 l
	326.96 535.36 l
	332.96 535.36 l
	345.6 546.72 l
	fk
	272.88 589.2 m
	271.2 564.72 l
	277.76 549.76 l
	283.76 540.16 l
	301.76 526.32 l
	fk
	394.8 601.36 m
	409.2 594.16 l
	415.2 589.92 l
	439.2 589.92 l
	442.8 593.52 l
	458.96 598.32 l
	468.56 597.12 l
	481.2 592.32 l
	485.92 591.36 l
	491.36 598.96 l
	491.36 605.52 l
	483.6 618.16 l
	484.16 622.96 l
	492 639.12 l
	fk
	418.72 589.84 m
	421.76 557.52 l
	421.76 549.12 l
	fk
	454.8 532.96 m
	462.56 545.52 l
	468.56 555.12 l
	476.96 559.36 l
	483.6 564.72 l
	493.2 565.92 l
	498 568.96 l
	515.36 570.16 l
	516 573.76 l
	fk
	531.6 476.56 m
	540.56 481.92 l
	542.96 487.36 l
	541.2 497.52 l
	539.36 501.76 l
	532.8 503.52 l
	524.96 505.92 l
	506.4 504.16 l
	493.76 506.56 l
	468.56 507.76 l
	fk
	518.4 505.92 m
	514.8 513.12 l
	516 520.32 l
	519.6 526.32 l
	523.2 528.16 l
	536.96 525.76 l
	546.56 524.56 l
	553.2 527.52 l
	559.76 547.92 l
	fk
	118.8 298.32 m
	128.4 289.92 l
	135.6 289.92 l
	146.4 291.76 l
	152.4 292.32 l
	163.2 296.56 l
	172.8 295.36 l
	212.4 246.16 l
	fk
	192 332.56 m
	192 324.72 l
	190.8 320.56 l
	188.96 317.52 l
	182.4 310.96 l
	170.96 294.72 l
	fk
	118.8 368.32 m
	127.76 362.56 l
	139.2 362.56 l
	144 364.32 l
	153.6 359.52 l
	170.4 355.92 l
	fk
	175.2 433.36 m
	175.2 421.92 l
	174 415.36 l
	181.2 402.16 l
	182.96 397.92 l
	192 388.96 l
	194.96 387.76 l
	196.16 371.52 l
	fk
	184.72 395.44 m
	194.96 396.16 l
	203.36 392.56 l
	210 392.56 l
	230.4 396.72 l
	244.8 402.16 l
	265.2 415.92 l
	266.96 423.12 l
	260.96 432.16 l
	252 438.72 l
	246.56 448.96 l
	227.36 471.76 l
	fk
	266.88 423.04 m
	282.56 417.76 l
	290.4 416.56 l
	307.2 420.72 l
	fk
	284.88 334.24 m
	293.36 334.96 l
	312 341.52 l
	317.36 340.32 l
	334.16 343.36 l
	347.28 348.96 l
	fk
	343.36 429.92 m
	356.4 430.32 l
	360.56 432.16 l
	366.56 430.96 l
	376.08 421.84 l
	fk
	349.12 458.4 m
	360 469.36 l
	366 477.12 l
	379.76 481.36 l
	397.2 480.16 l
	409.2 483.12 l
	412.8 487.36 l
	413.36 496.32 l
	415.76 508.96 l
	415.2 517.92 l
	410.96 533.52 l
	408 547.92 l
	fk
	413.36 489.76 m
	420.56 486.16 l
	427.2 486.16 l
	443.36 484.32 l
	444.56 481.36 l
	454.16 484.96 l
	464.56 484.8 l
	fk
	426.56 420.72 m
	430.16 424.32 l
	438.56 424.96 l
	452.4 425.52 l
	457.2 425.52 l
	470.4 420.72 l
	484.8 418.96 l
	fk
	519.52 397.84 m
	523.2 381.76 l
	529.76 370.32 l
	534.56 359.52 l
	536.96 346.96 l
	536.96 340.32 l
	fk
	401.92 359.76 m
	417.6 352.32 l
	426 351.76 l
	451.76 347.52 l
	457.76 347.52 l
	475.36 343.84 l
	fk
	489.52 210.96 m
	510.56 215.52 l
	542.96 222.72 l
	565.2 229.36 l
	598.16 234.16 l
	fk
	540.56 255.76 m
	544.16 247.36 l
	552.56 237.12 l
	559.2 238.32 l
	566.4 229.36 l
	fk
	424.8 250.96 m
	436.16 250.32 l
	446.96 252.16 l
	470.88 269.44 l
	fk
	357.76 241.2 m
	363.6 267.76 l
	364.16 280.96 l
	371.36 291.12 l
	380.4 294.16 l
	399.6 298.96 l
	425.36 300.16 l
	446.88 304.56 l
	fk
	270.56 315.12 m
	279.6 299.52 l
	277.2 286.32 l
	277.76 273.76 l
	269.36 258.16 l
	267.6 245.52 l
	fk
	278.4 289.36 m
	297.6 294.72 l
	312 298.32 l
	322.16 294.72 l
	332.4 293.52 l
	342.56 291.76 l
	344.4 289.92 l
	371.36 291.12 l
	fk
	120 559.92 m
	128.4 547.92 l
	143.36 543.12 l
	157.2 546.16 l
	177.6 547.36 l
	182.4 541.92 l
	181.76 537.76 l
	184.8 528.72 l
	181.2 520.96 l
	181.2 513.12 l
	172.16 493.36 l
	168 493.36 l
	159.6 478.96 l
	160.8 469.92 l
	160.8 462.72 l
	154.16 454.32 l
	151.2 450.72 l
	155.92 432.64 l
	fk
	485.36 591.76 m
	498 589.36 l
	502.16 585.12 l
	506.96 580.32 l
	514.8 576.16 l
	518.4 568.96 l
	527.36 558.72 l
	530.96 553.92 l
	547.76 553.92 l
	555.6 549.76 l
	562.8 545.52 l
	566.96 559.92 l
	571.2 568.96 l
	579.6 571.36 l
	584.4 570.72 l
	597.6 564.16 l
	fk
} bd
{
	currentdict end 3 1 roll [ exch /setgray load ] cvx def begin
}{
	currentdict end 5 1 roll [ 4 1 roll /setrgbcolor load ] cvx def begin
}{
	currentdict end 6 1 roll [ 5 1 roll /setcmykcolor load ] cvx def begin
} bind VisitColors
s
MapUnitLetterFont z
{
	exch load exch load
	2 index [ exch n 0 0 m true charpath pathbbox 3 2 roll add -2 div 3 1 roll add -2 div exch ] 3 1 roll
	4 dict begin /Contrast xd /Paint xd /Offset xd /Letter xd currentdict end
	[ /Power 3 2 roll { dup /Controlled ChangeController put ChangeController { dup /Outer Power /Paint get put /ChangeController false def } if } /exec load /def load ] cvx
	currentdict end 3 1 roll def begin
} VisitPowers
r
/ChangeController false def
/EASTCENTER /EAST ld
/NORTHCENTER /NORTH ld
/SOUTHCENTER /SOUTH ld
/WESTCENTER /WEST ld
/UNOWNEDCENTER /UNOWNED ld
{ currentdict end 4 1 roll [ 3 1 roll ] cvx def begin } bind
VisitSupplies
%%EndSetup
/DrawNames {
378 568 (AEO) DrawName
208 508 (ALC) DrawName
498 438 (AMA) DrawName
398 428 (APH) DrawName
513 308 (ARE) DrawName
453 218 (ARG) DrawName
378 190 (AUT) DrawName
318 190 (CAL) DrawName
508 231 (CEC) DrawName
488 533 (CEN) DrawName
168 218 (CHA) DrawName
448 568 (CHI) DrawName
373 358 (CUP) DrawName
248 608 (DEI) DrawName
558 368 (EAS) DrawName
488 478 (ECH) DrawName
133 213 (ELY) DrawName
178 578 (FIE) DrawName
223 288 (FIR) DrawName
238 190 (FUR) DrawName
358 233 (GAB) DrawName
388 513 (GLI) DrawName
278 448 (GOC) DrawName
318 233 (HAD) DrawName
258 528 (HER) DrawName
228 363 (HES) DrawName
478 283 (HIN) DrawName
548 448 (HIP) DrawName
148 508 (JAS) DrawName
428 190 (JOX) DrawName
148 328 (LBS) DrawName
195 355 (LES) DrawName
358 308 (LOV) DrawName
343 518 (MID) DrawName
568 508 (MIN) DrawName
198 448 (MOR) DrawName
438 513 (NAR) DrawName
468 318 (NES) DrawName
318 568 (OLY) DrawName
148 258 (PEA) DrawName
268 238 (PER) DrawName
388 278 (POS) DrawName
328 438 (PRO) DrawName
388 388 (PSY) DrawName
303 478 (SAL) DrawName
458 378 (SCH) DrawName
518 338 (SER) DrawName
528 598 (SIS) DrawName
278 388 (SOA) DrawName
228 418 (SOD) DrawName
318 273 (SOT) DrawName
538 193 (SOU) DrawName
398 468 (SOW) DrawName
518 268 (STR) DrawName
438 613 (TAN) DrawName
218 238 (TAR) DrawName
263 348 (VES) DrawName
148 398 (WES) DrawName
408 228 (XEN) DrawName
328 613 (ZEU) DrawName
} def
%%Page: 1 1
%%PageBoundingBox: 0 0 792 612
DrawMap
DrawNames
(sailho0, Winter 0 ) DrawTitle

EAST
498 438 DrawFleet
488 533 DrawArmy
NORTH
378 568 DrawArmy
258 528 DrawArmy
SOUTH
318 233 DrawArmy
408 228 DrawFleet
WEST
195 355 DrawFleet
263 348 DrawFleet

258 528 BuildUnit
408 228 RemoveUnit

488 533 DestroyUnit
263 348 DisbandUnit
OrderReport
(EAST) WriteOrder
( F AMA                ) WriteOrder
( A CEN H              DESTROYED) WriteOrder
(NORTH) WriteOrder
( A AEO                ) WriteOrder
(SOUTH) WriteOrder
( A HAD                ) WriteOrder
(WEST) WriteOrder
( F LES                ) WriteOrder
( F VES H              DISLODGED) WriteOrder

RetreatReport
(WEST       F VES DISBAND  ) WriteRetreat

AdjustReport
(NORTH      BUILDS  A HER) WriteAdjust
(SOUTH      REMOVES F XEN) WriteAdjust

OwnerReport
(EAST       (2/2)   AMA CEN) WriteOwner
(NORTH      (1/2)   AEO HER) WriteOwner
(SOUTH      (2/2)   HAD XEN) WriteOwner
(WEST       (2/2)   LES VES) WriteOwner
(UNOWNED            APH ARE CUP MOR NES PRO STR TAR) WriteOwner

EAST
AMA supply
CEN supply
NORTH
AEO supply
HER supply
SOUTH
HAD supply
XEN supply
WEST
LES supply
VES supply
UNOWNED
APH supply
ARE supply
CUP supply
MOR supply
NES supply
PRO supply
STR supply
TAR supply

Black
ShowPage
%%PageTrailer
%%Trailer
%%Pages: 1 1
%%BoundingBox: 0 0 792 612
